home *** CD-ROM | disk | FTP | other *** search
/ How Many Bugs in a Box / How Many Bugs in a Box.cdr / bugs / act2 / 00246.ls < prev    next >
Encoding:
Text File  |  1995-03-28  |  482 b   |  20 lines
  1. on exitFrame
  2.   global gametwolevel, direction, wnum, mysound, reachcur, grabcur
  3.   bugsetup()
  4.   set reachcur to the number of cast "cursorpos"
  5.   set grabcur to the number of cast "cursorpos2"
  6.   cursor([reachcur, reachcur + 1])
  7.   if gametwolevel = 1 then
  8.     set mysound to "Put " & wnum
  9.     go("level1")
  10.   else
  11.     if gametwolevel = 2 then
  12.       go("level2." & direction)
  13.     else
  14.       if gametwolevel = 3 then
  15.         go("level3." & direction)
  16.       end if
  17.     end if
  18.   end if
  19. end
  20.